package com.gouying.web.service.impl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.TypeReference;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.gouying.common.utils.PageUtils;
import com.gouying.common.utils.Query;
import com.gouying.web.dao.CategoryDao;
import com.gouying.web.entity.CategoryEntity;
import com.gouying.web.service.CategoryBrandRelationService;
import com.gouying.web.service.CategoryService;
import com.gouying.web.vo.Catalog2Vo;
import lombok.AllArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.redisson.api.RLock;
import org.redisson.api.RedissonClient;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.cache.annotation.CacheEvict;
import org.springframework.cache.annotation.Cacheable;
import org.springframework.cache.annotation.Caching;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.data.redis.core.script.DefaultRedisScript;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;

/**
 * @author ly
 */
@Slf4j
@Service("categoryService")
@AllArgsConstructor(onConstructor_ = @Autowired)
public class CategoryServiceImpl extends ServiceImpl<CategoryDao, CategoryEntity> implements CategoryService {

    private final CategoryBrandRelationService categoryBrandRelationService;

    private final StringRedisTemplate redisTemplate;

//    private final RedissonClient redisson;

    @Override
    public PageUtils queryPage(Map<String, Object> params) {
        IPage<CategoryEntity> page = this.page(
                new Query<CategoryEntity>().getPage(params),
                new QueryWrapper<>()
        );
        return new PageUtils(page);
    }

    @Override
    public List<CategoryEntity> listWithTree() {
        // 1、查出所有分类（没有查询条件）
        List<CategoryEntity> entities = baseMapper.selectList(null);
        // 2、组装成父子的树形结构
        // 2.1）、找到所有的一级分类
        return entities.stream().filter((categoryEntity) -> categoryEntity.getParentCid() == 0)
                // 2.2）、加入除一级分类之外的子分类
                .peek((menu) -> menu.setChildren(getChildren(menu, entities)))
                .sorted(Comparator.comparingInt(menu -> (menu.getSort() == null ? 0 : menu.getSort())))
                .collect(Collectors.toList());
    }

    @Override
    public void removeMenuByIds(List<Long> asList) {
        //TODO  1、检查当前删除的菜单，是否被别的地方引用
        //逻辑删除
        baseMapper.deleteBatchIds(asList);
    }

    /**
     * 找出三级分类的完整路径[2,25,225]
     *
     * @param catalogId 菜单
     * @return
     */
    @Override
    public Long[] findCatalogPath(Long catalogId) {
        List<Long> paths = new ArrayList<>();
        List<Long> parentPath = findParentPath(catalogId, paths);
        //将找到的三级分类节点进行反转225,25,2==>2,25,225
        Collections.reverse(parentPath);
        return parentPath.toArray(new Long[0]);
    }

    /**
     * @CacheEvict(value = "category",key = "'getLevel1Category'")
     * @CacheEvict(value = "category", allEntries = true)
     * @param category 待更新的分类
     */
    @Transactional(rollbackFor = Exception.class)
    @Caching(evict = {
            @CacheEvict(value = "category", key = "'getLevel1Category'"),
            @CacheEvict(value = "category", key = "'getCatalogJson'")
    })
    @Override
    public void updateCascade(CategoryEntity category) {
        //新更新分类信息
        updateById(category);
        //再调用categoryBrandRelationService关联表的对象，更新包括关联关系表中的冗余字段
        categoryBrandRelationService.updateCategory(category.getCatId(), category.getName());

        //同步缓存的方法：
        //  1、修改完后同时修改缓存中的数据
        //  2、redis.del("catalogJSON")
        //  3、修改完删除缓存中的数据，等待下次主动查询进行更新
    }

    @Cacheable(value = {"category"}, key = "#root.method.name", sync = true)
    @Override
    public List<CategoryEntity> getLevel1Category() {
        log.info("获取一级分类.......");
        return baseMapper.selectList(new QueryWrapper<CategoryEntity>().eq("parent_cid", 0));
    }

    @Override
    @Cacheable(value = "category", key = "#root.methodName")
    public Map<String, List<Catalog2Vo>> getCatalogJson() {
        log.info("查询了三级分类............");
        List<CategoryEntity> selectList = baseMapper.selectList(null);
        //查出所有1级分类
        List<CategoryEntity> level1Category = getParentCatalogId(selectList, 0L);
        return level1Category.stream().collect(Collectors.toMap(k -> k.getCatId().toString(), v -> {
            //1、每一个的一级分类，查到这个一级分类的二级分类
            List<CategoryEntity> categoryEntities = getParentCatalogId(selectList, v.getCatId());
            //2、封装上面的结果
            List<Catalog2Vo> catalog2Vos = null;
            if (categoryEntities != null) {
                catalog2Vos = categoryEntities.stream().map(l2 -> {
                    Catalog2Vo catalog2Vo = new Catalog2Vo(v.getCatId().toString(), null, l2.getCatId().toString(), l2.getName());
                    //1、找当前二级分类的三级分类封装成Vo
                    List<CategoryEntity> level3Catalog = getParentCatalogId(selectList, l2.getCatId());
                    if (level3Catalog != null) {
                        List<Catalog2Vo.Catalog3Vo> collect = level3Catalog.stream().map(l3 -> {
                            //2、封装成指定格式
                            return new Catalog2Vo.Catalog3Vo(l2.getCatId().toString(), l3.getCatId().toString(), l3.getName());
                        }).collect(Collectors.toList());
                        //设置二级分类中三级分类的集合
                        catalog2Vo.setCatalog3List(collect);
                    }
                    return catalog2Vo;
                }).collect(Collectors.toList());
            }
            return catalog2Vos;
        }));
    }

    /**
     * 从Redis查询分类数据
     */
    public Map<String, List<Catalog2Vo>> getCatalogJson2() {
        //给缓存中放json字符串，拿出的json字符串，还能逆转为能用的对象类型：【序列号与反序列化】
        /*
         * 1、空结果缓存：解决缓存穿透
         * 2、设置过期时间（加随机值）：解决缓存雪崩
         * 3、加锁：解决缓存击穿
         */
        //加入缓存逻辑，缓存中存的数据是json字符串
        //json跨语言，跨平台兼容
        String categoryJson = redisTemplate.opsForValue().get("catalogJSON");
        //如果缓存中没有对应数据
        if (StringUtils.isEmpty(categoryJson)) {
            //查询数据库
            log.info("缓存不命中..........将要查询数据库............");
            return getCatalogJsonFromDbWithRedisLock();
        }

        log.info("缓存命中..........直接返回...........");
        // 如果缓存中有对应的数据，就反序列化为对象并取出
        return JSON.parseObject(categoryJson, new TypeReference<Map<String, List<Catalog2Vo>>>() {
        });
    }

    /**
     * 使用Redisson分布式锁
     *
     * @return
     */
    public Map<String, List<Catalog2Vo>> getCatalogJsonFromDbWithRedissonLock() {
        //1、锁的名字。锁的粒度,越细越快。
        // 锁的粒度:具体缓存的是某个数据，11-号商品;product-11-Lock product-12-lock   product-Lock
//        RLock lock = redisson.getLock("catalogJson-lock");
//        lock.lock();

        Map<String, List<Catalog2Vo>> dataFromDb;
        try {
            dataFromDb = getDataFromDb();
        } finally {
//            lock.unlock();
        }
        return dataFromDb;
    }


    /**
     * 使用Redis集合lua脚本实现分布式锁
     *
     * @return
     */
    public Map<String, List<Catalog2Vo>> getCatalogJsonFromDbWithRedisLock() {
        String uuid = UUID.randomUUID().toString();
        //1、占分布式锁，去redis占坑（设置一个占坑字段）
        Boolean lock = redisTemplate.opsForValue().setIfAbsent("lock", uuid, 300, TimeUnit.SECONDS);
        if (lock) {
            log.info("获取分布式锁成功.......");
            //加锁成功，执行业务
            //设置过期时间，防止死锁
            //redisTemplate.expire("lock",30,TimeUnit.SECONDS);
            Map<String, List<Catalog2Vo>> dataFromDb;
            try {
                dataFromDb = getDataFromDb();
            } finally {
                //获取当前锁的随机值+对比成功=原子操作  lua脚本解锁
                String script = "if redis.call('get',KEYS[1]) == ARGV[1] then  return redis.call('del',KEYS[1]) else return 0 end";
                DefaultRedisScript<Long> redisScript = new DefaultRedisScript<>(script, Long.class);
                //原子性操作删除锁
                Long lock1 = redisTemplate.execute(redisScript, Collections.singletonList("lock"), uuid);
            }
//            String lockValue = redisTemplate.opsForValue().get("lock");
//            if (uuid.equals(lockValue)) {
//                //uuid相等，证明是我自己加的锁，可以删除锁
//                redisTemplate.delete("lock");
//            }
            return dataFromDb;
        } else {
            log.info("获取分布式锁失败.......等待重试");
            try {
                Thread.sleep(200);
            } catch (Exception e) {
                log.info(e.getMessage());
            }
            //加锁失败（已经有人加了）
            //自旋的方式进行重试
            return getCatalogJsonFromDbWithRedisLock();
        }
    }

    /**
     * 使用本地锁
     *
     * @return
     */
    public Map<String, List<Catalog2Vo>> getCatalogJsonFromDbWithLocalLock() {
        //只要是同一把锁，就能锁住需要这个锁的所有线程
        //1、synchronized (this)：SpringBoot中所有的Bean所有的组件在容器中都是单例的
        synchronized (this) {
            //第一个请求在缓存中放入了数据，下一个请求得到锁以后，应该再去缓存中确定一次，如果没有才需要继续查询
            return getDataFromDb();
        }
    }

    /**
     * 从数据库查询并封装分类数据
     *
     * @return 三级分类
     */
    public Map<String, List<Catalog2Vo>> getCatalogJsonFromDb() {
        //只要是同一把锁，就能锁住需要这个锁的所有线程
        //1、synchronized (this)：spring所有的组件在容器中都是单例的
        synchronized (this) {
            //第一个请求在缓存中放入了数据，下一个请求得到锁以后，应该再去缓存中确定一次，如果没有才需要继续查询
            return getDataFromDb();
        }
    }

    /**
     * 抽取的查询三级分类的方法
     *
     * @return 三级分类
     */
    private Map<String, List<Catalog2Vo>> getDataFromDb() {
        String catalogJson = redisTemplate.opsForValue().get("catalogJSON");
        if (!StringUtils.isEmpty(catalogJson)) {
            //缓存如果不为null，就直接返回，不在进行接下来的查库操作
            return JSON.parseObject(catalogJson, new TypeReference<Map<String, List<Catalog2Vo>>>() {
            });
        }
        log.info("查询了数据库............");
        List<CategoryEntity> selectList = baseMapper.selectList(null);

        //查出所有1级分类
        List<CategoryEntity> level1Category = getParentCatalogId(selectList, 0L);
        Map<String, List<Catalog2Vo>> parentCatalogId = level1Category.stream().collect(Collectors.toMap(k -> k.getCatId().toString(), v -> {
            //1、每一个的一级分类，查到这个一级分类的二级分类
            List<CategoryEntity> categoryEntities = getParentCatalogId(selectList, v.getCatId());
            //2、封装上面的结果
            List<Catalog2Vo> catalog2Vos = null;
            if (categoryEntities != null) {
                catalog2Vos = categoryEntities.stream().map(l2 -> {
                    Catalog2Vo catalog2Vo = new Catalog2Vo(v.getCatId().toString(), null, l2.getCatId().toString(), l2.getName());
                    //1、找当前二级分类的三级分类封装成Vo
                    List<CategoryEntity> level3Catalog = getParentCatalogId(selectList, l2.getCatId());
                    if (level3Catalog != null) {
                        List<Catalog2Vo.Catalog3Vo> collect = level3Catalog.stream().map(l3 -> {
                            //2、封装成指定格式

                            return new Catalog2Vo.Catalog3Vo(l2.getCatId().toString(), l3.getCatId().toString(), l3.getName());
                        }).collect(Collectors.toList());
                        //设置二级分类中三级分类的集合
                        catalog2Vo.setCatalog3List(collect);
                    }
                    return catalog2Vo;
                }).collect(Collectors.toList());
            }
            return catalog2Vos;
        }));
        //将从数据库中查到的数据放到缓存中，以备下次访问使用
        String s = JSON.toJSONString(parentCatalogId);
        //设置缓存过期时间为1天
        redisTemplate.opsForValue().set("catalogJSON", s, 1, TimeUnit.DAYS);
        return parentCatalogId;
    }

    /**
     * 抽取查询parentId的方法
     *
     * @param selectList
     * @param parentCatalogId
     * @return
     */
    private List<CategoryEntity> getParentCatalogId(List<CategoryEntity> selectList, Long parentCatalogId) {
        return selectList.stream().filter(item -> item.getParentCid().equals(parentCatalogId))
                .collect(Collectors.toList());
    }

    /**
     * 查找某个节点的父节点225,25,2(从子开始查)
     *
     * @param catalogId
     * @param paths
     * @return
     */
    private List<Long> findParentPath(Long catalogId, List<Long> paths) {
        //1、收集当前节点id
        paths.add(catalogId);
        CategoryEntity byId = this.getById(catalogId);
        //如果父节点不为0，就递归查找父节点的父节点
        if (byId.getParentCid() != 0) {
            findParentPath(byId.getParentCid(), paths);
        }
        return paths;
    }

    /**
     * 递归查找所有菜单的子菜单
     *
     * @param root
     * @param all
     * @return
     */
    private List<CategoryEntity> getChildren(CategoryEntity root, List<CategoryEntity> all) {
        return all.stream().filter(categoryEntity -> categoryEntity.getParentCid().equals(root.getCatId()))
                //1、找到子菜单
                .peek(categoryEntity -> categoryEntity.setChildren(getChildren(categoryEntity, all)))
                //2、菜单的排序
                .sorted(Comparator.comparingInt(menu -> (menu.getSort() == null ? 0 : menu.getSort())))
                .collect(Collectors.toList());
    }
}